3.3.8 \(\int \sin ^3(a+b x) \sin ^3(c+d x) \, dx\) [208]
Optimal. Leaf size=195 \[ -\frac {3 \sin (a-3 c+(b-3 d) x)}{32 (b-3 d)}+\frac {9 \sin (a-c+(b-d) x)}{32 (b-d)}+\frac {\sin (3 (a-c)+3 (b-d) x)}{96 (b-d)}-\frac {3 \sin (3 a-c+(3 b-d) x)}{32 (3 b-d)}-\frac {9 \sin (a+c+(b+d) x)}{32 (b+d)}-\frac {\sin (3 (a+c)+3 (b+d) x)}{96 (b+d)}+\frac {3 \sin (3 a+c+(3 b+d) x)}{32 (3 b+d)}+\frac {3 \sin (a+3 c+(b+3 d) x)}{32 (b+3 d)} \]
[Out]
-3/32*sin(a-3*c+(b-3*d)*x)/(b-3*d)+9/32*sin(a-c+(b-d)*x)/(b-d)+1/96*sin(3*a-3*c+3*(b-d)*x)/(b-d)-3/32*sin(3*a-
c+(3*b-d)*x)/(3*b-d)-9/32*sin(a+c+(b+d)*x)/(b+d)-1/96*sin(3*a+3*c+3*(b+d)*x)/(b+d)+3/32*sin(3*a+c+(3*b+d)*x)/(
3*b+d)+3/32*sin(a+3*c+(b+3*d)*x)/(b+3*d)
________________________________________________________________________________________
Rubi [A]
time = 0.10, antiderivative size = 195, normalized size of antiderivative = 1.00, number of steps
used = 10, number of rules used = 2, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.118, Rules used = {4665, 2717}
\begin {gather*} -\frac {3 \sin (a+x (b-3 d)-3 c)}{32 (b-3 d)}+\frac {9 \sin (a+x (b-d)-c)}{32 (b-d)}+\frac {\sin (3 (a-c)+3 x (b-d))}{96 (b-d)}-\frac {3 \sin (3 a+x (3 b-d)-c)}{32 (3 b-d)}-\frac {9 \sin (a+x (b+d)+c)}{32 (b+d)}-\frac {\sin (3 (a+c)+3 x (b+d))}{96 (b+d)}+\frac {3 \sin (3 a+x (3 b+d)+c)}{32 (3 b+d)}+\frac {3 \sin (a+x (b+3 d)+3 c)}{32 (b+3 d)} \end {gather*}
Antiderivative was successfully verified.
[In]
Int[Sin[a + b*x]^3*Sin[c + d*x]^3,x]
[Out]
(-3*Sin[a - 3*c + (b - 3*d)*x])/(32*(b - 3*d)) + (9*Sin[a - c + (b - d)*x])/(32*(b - d)) + Sin[3*(a - c) + 3*(
b - d)*x]/(96*(b - d)) - (3*Sin[3*a - c + (3*b - d)*x])/(32*(3*b - d)) - (9*Sin[a + c + (b + d)*x])/(32*(b + d
)) - Sin[3*(a + c) + 3*(b + d)*x]/(96*(b + d)) + (3*Sin[3*a + c + (3*b + d)*x])/(32*(3*b + d)) + (3*Sin[a + 3*
c + (b + 3*d)*x])/(32*(b + 3*d))
Rule 2717
Int[sin[Pi/2 + (c_.) + (d_.)*(x_)], x_Symbol] :> Simp[Sin[c + d*x]/d, x] /; FreeQ[{c, d}, x]
Rule 4665
Int[Sin[v_]^(p_.)*Sin[w_]^(q_.), x_Symbol] :> Int[ExpandTrigReduce[Sin[v]^p*Sin[w]^q, x], x] /; ((PolynomialQ[
v, x] && PolynomialQ[w, x]) || (BinomialQ[{v, w}, x] && IndependentQ[Cancel[v/w], x])) && IGtQ[p, 0] && IGtQ[q
, 0]
Rubi steps
\begin {align*} \int \sin ^3(a+b x) \sin ^3(c+d x) \, dx &=\int \left (-\frac {3}{32} \cos (a-3 c+(b-3 d) x)+\frac {9}{32} \cos (a-c+(b-d) x)+\frac {1}{32} \cos (3 (a-c)+3 (b-d) x)-\frac {3}{32} \cos (3 a-c+(3 b-d) x)-\frac {9}{32} \cos (a+c+(b+d) x)-\frac {1}{32} \cos (3 (a+c)+3 (b+d) x)+\frac {3}{32} \cos (3 a+c+(3 b+d) x)+\frac {3}{32} \cos (a+3 c+(b+3 d) x)\right ) \, dx\\ &=\frac {1}{32} \int \cos (3 (a-c)+3 (b-d) x) \, dx-\frac {1}{32} \int \cos (3 (a+c)+3 (b+d) x) \, dx-\frac {3}{32} \int \cos (a-3 c+(b-3 d) x) \, dx-\frac {3}{32} \int \cos (3 a-c+(3 b-d) x) \, dx+\frac {3}{32} \int \cos (3 a+c+(3 b+d) x) \, dx+\frac {3}{32} \int \cos (a+3 c+(b+3 d) x) \, dx+\frac {9}{32} \int \cos (a-c+(b-d) x) \, dx-\frac {9}{32} \int \cos (a+c+(b+d) x) \, dx\\ &=-\frac {3 \sin (a-3 c+(b-3 d) x)}{32 (b-3 d)}+\frac {9 \sin (a-c+(b-d) x)}{32 (b-d)}+\frac {\sin (3 (a-c)+3 (b-d) x)}{96 (b-d)}-\frac {3 \sin (3 a-c+(3 b-d) x)}{32 (3 b-d)}-\frac {9 \sin (a+c+(b+d) x)}{32 (b+d)}-\frac {\sin (3 (a+c)+3 (b+d) x)}{96 (b+d)}+\frac {3 \sin (3 a+c+(3 b+d) x)}{32 (3 b+d)}+\frac {3 \sin (a+3 c+(b+3 d) x)}{32 (b+3 d)}\\ \end {align*}
________________________________________________________________________________________
Mathematica [A]
time = 1.71, size = 177, normalized size = 0.91 \begin {gather*} \frac {1}{96} \left (-\frac {9 \sin (a-3 c+b x-3 d x)}{b-3 d}+\frac {27 \sin (a-c+b x-d x)}{b-d}+\frac {\sin (3 (a-c+b x-d x))}{b-d}-\frac {9 \sin (3 a-c+3 b x-d x)}{3 b-d}+\frac {9 \sin (3 a+c+3 b x+d x)}{3 b+d}+\frac {9 \sin (a+3 c+b x+3 d x)}{b+3 d}-\frac {27 \sin (a+c+(b+d) x)}{b+d}-\frac {\sin (3 (a+c+(b+d) x))}{b+d}\right ) \end {gather*}
Antiderivative was successfully verified.
[In]
Integrate[Sin[a + b*x]^3*Sin[c + d*x]^3,x]
[Out]
((-9*Sin[a - 3*c + b*x - 3*d*x])/(b - 3*d) + (27*Sin[a - c + b*x - d*x])/(b - d) + Sin[3*(a - c + b*x - d*x)]/
(b - d) - (9*Sin[3*a - c + 3*b*x - d*x])/(3*b - d) + (9*Sin[3*a + c + 3*b*x + d*x])/(3*b + d) + (9*Sin[a + 3*c
+ b*x + 3*d*x])/(b + 3*d) - (27*Sin[a + c + (b + d)*x])/(b + d) - Sin[3*(a + c + (b + d)*x)]/(b + d))/96
________________________________________________________________________________________
Maple [A]
time = 0.38, size = 184, normalized size = 0.94
| | |
method |
result |
size |
| | |
default |
\(-\frac {3 \sin \left (a -3 c +\left (b -3 d \right ) x \right )}{32 \left (b -3 d \right )}+\frac {9 \sin \left (a -c +\left (b -d \right ) x \right )}{32 \left (b -d \right )}-\frac {9 \sin \left (a +c +\left (b +d \right ) x \right )}{32 \left (b +d \right )}+\frac {3 \sin \left (a +3 c +\left (b +3 d \right ) x \right )}{32 \left (b +3 d \right )}+\frac {\sin \left (\left (3 b -3 d \right ) x +3 a -3 c \right )}{96 b -96 d}-\frac {3 \sin \left (3 a -c +\left (3 b -d \right ) x \right )}{32 \left (3 b -d \right )}+\frac {3 \sin \left (3 a +c +\left (3 b +d \right ) x \right )}{32 \left (3 b +d \right )}-\frac {\sin \left (\left (3 b +3 d \right ) x +3 a +3 c \right )}{96 \left (b +d \right )}\) |
\(184\) |
risch |
\(\text {Expression too large to display}\) |
\(1466\) |
| | |
|
|
|
Verification of antiderivative is not currently implemented for this CAS.
[In]
int(sin(b*x+a)^3*sin(d*x+c)^3,x,method=_RETURNVERBOSE)
[Out]
-3/32*sin(a-3*c+(b-3*d)*x)/(b-3*d)+9/32*sin(a-c+(b-d)*x)/(b-d)-9/32*sin(a+c+(b+d)*x)/(b+d)+3/32*sin(a+3*c+(b+3
*d)*x)/(b+3*d)+1/96/(b-d)*sin((3*b-3*d)*x+3*a-3*c)-3/32*sin(3*a-c+(3*b-d)*x)/(3*b-d)+3/32*sin(3*a+c+(3*b+d)*x)
/(3*b+d)-1/96/(b+d)*sin((3*b+3*d)*x+3*a+3*c)
________________________________________________________________________________________
Maxima [B] Leaf count of result is larger than twice the leaf count of optimal. 2612 vs.
\(2 (179) = 358\).
time = 0.44, size = 2612, normalized size = 13.39 \begin {gather*} \text {Too large to display} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(sin(b*x+a)^3*sin(d*x+c)^3,x, algorithm="maxima")
[Out]
-1/192*(9*(3*b^5*sin(3*c) - b^4*d*sin(3*c) - 30*b^3*d^2*sin(3*c) + 10*b^2*d^3*sin(3*c) + 27*b*d^4*sin(3*c) - 9
*d^5*sin(3*c))*cos((3*b + d)*x + 3*a + 4*c) - 9*(3*b^5*sin(3*c) - b^4*d*sin(3*c) - 30*b^3*d^2*sin(3*c) + 10*b^
2*d^3*sin(3*c) + 27*b*d^4*sin(3*c) - 9*d^5*sin(3*c))*cos((3*b + d)*x + 3*a - 2*c) + 9*(3*b^5*sin(3*c) + b^4*d*
sin(3*c) - 30*b^3*d^2*sin(3*c) - 10*b^2*d^3*sin(3*c) + 27*b*d^4*sin(3*c) + 9*d^5*sin(3*c))*cos(-(3*b - d)*x -
3*a + 4*c) - 9*(3*b^5*sin(3*c) + b^4*d*sin(3*c) - 30*b^3*d^2*sin(3*c) - 10*b^2*d^3*sin(3*c) + 27*b*d^4*sin(3*c
) + 9*d^5*sin(3*c))*cos(-(3*b - d)*x - 3*a - 2*c) + 9*(9*b^5*sin(3*c) - 27*b^4*d*sin(3*c) - 10*b^3*d^2*sin(3*c
) + 30*b^2*d^3*sin(3*c) + b*d^4*sin(3*c) - 3*d^5*sin(3*c))*cos((b + 3*d)*x + a + 6*c) - 9*(9*b^5*sin(3*c) - 27
*b^4*d*sin(3*c) - 10*b^3*d^2*sin(3*c) + 30*b^2*d^3*sin(3*c) + b*d^4*sin(3*c) - 3*d^5*sin(3*c))*cos((b + 3*d)*x
+ a) - (9*b^5*sin(3*c) - 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) + 82*b^2*d^3*sin(3*c) + 9*b*d^4*sin(3*c) - 9*
d^5*sin(3*c))*cos(3*(b + d)*x + 3*a + 6*c) + (9*b^5*sin(3*c) - 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) + 82*b^2
*d^3*sin(3*c) + 9*b*d^4*sin(3*c) - 9*d^5*sin(3*c))*cos(3*(b + d)*x + 3*a) - 27*(9*b^5*sin(3*c) - 9*b^4*d*sin(3
*c) - 82*b^3*d^2*sin(3*c) + 82*b^2*d^3*sin(3*c) + 9*b*d^4*sin(3*c) - 9*d^5*sin(3*c))*cos((b + d)*x + a + 4*c)
+ 27*(9*b^5*sin(3*c) - 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) + 82*b^2*d^3*sin(3*c) + 9*b*d^4*sin(3*c) - 9*d^5
*sin(3*c))*cos((b + d)*x + a - 2*c) - 27*(9*b^5*sin(3*c) + 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) - 82*b^2*d^3
*sin(3*c) + 9*b*d^4*sin(3*c) + 9*d^5*sin(3*c))*cos(-(b - d)*x - a + 4*c) + 27*(9*b^5*sin(3*c) + 9*b^4*d*sin(3*
c) - 82*b^3*d^2*sin(3*c) - 82*b^2*d^3*sin(3*c) + 9*b*d^4*sin(3*c) + 9*d^5*sin(3*c))*cos(-(b - d)*x - a - 2*c)
- (9*b^5*sin(3*c) + 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) - 82*b^2*d^3*sin(3*c) + 9*b*d^4*sin(3*c) + 9*d^5*si
n(3*c))*cos(-3*(b - d)*x - 3*a + 6*c) + (9*b^5*sin(3*c) + 9*b^4*d*sin(3*c) - 82*b^3*d^2*sin(3*c) - 82*b^2*d^3*
sin(3*c) + 9*b*d^4*sin(3*c) + 9*d^5*sin(3*c))*cos(-3*(b - d)*x - 3*a) + 9*(9*b^5*sin(3*c) + 27*b^4*d*sin(3*c)
- 10*b^3*d^2*sin(3*c) - 30*b^2*d^3*sin(3*c) + b*d^4*sin(3*c) + 3*d^5*sin(3*c))*cos(-(b - 3*d)*x - a + 6*c) - 9
*(9*b^5*sin(3*c) + 27*b^4*d*sin(3*c) - 10*b^3*d^2*sin(3*c) - 30*b^2*d^3*sin(3*c) + b*d^4*sin(3*c) + 3*d^5*sin(
3*c))*cos(-(b - 3*d)*x - a) - 9*(3*b^5*cos(3*c) - b^4*d*cos(3*c) - 30*b^3*d^2*cos(3*c) + 10*b^2*d^3*cos(3*c) +
27*b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin((3*b + d)*x + 3*a + 4*c) - 9*(3*b^5*cos(3*c) - b^4*d*cos(3*c) - 30*b^
3*d^2*cos(3*c) + 10*b^2*d^3*cos(3*c) + 27*b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin((3*b + d)*x + 3*a - 2*c) - 9*(3
*b^5*cos(3*c) + b^4*d*cos(3*c) - 30*b^3*d^2*cos(3*c) - 10*b^2*d^3*cos(3*c) + 27*b*d^4*cos(3*c) + 9*d^5*cos(3*c
))*sin(-(3*b - d)*x - 3*a + 4*c) - 9*(3*b^5*cos(3*c) + b^4*d*cos(3*c) - 30*b^3*d^2*cos(3*c) - 10*b^2*d^3*cos(3
*c) + 27*b*d^4*cos(3*c) + 9*d^5*cos(3*c))*sin(-(3*b - d)*x - 3*a - 2*c) - 9*(9*b^5*cos(3*c) - 27*b^4*d*cos(3*c
) - 10*b^3*d^2*cos(3*c) + 30*b^2*d^3*cos(3*c) + b*d^4*cos(3*c) - 3*d^5*cos(3*c))*sin((b + 3*d)*x + a + 6*c) -
9*(9*b^5*cos(3*c) - 27*b^4*d*cos(3*c) - 10*b^3*d^2*cos(3*c) + 30*b^2*d^3*cos(3*c) + b*d^4*cos(3*c) - 3*d^5*cos
(3*c))*sin((b + 3*d)*x + a) + (9*b^5*cos(3*c) - 9*b^4*d*cos(3*c) - 82*b^3*d^2*cos(3*c) + 82*b^2*d^3*cos(3*c) +
9*b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin(3*(b + d)*x + 3*a + 6*c) + (9*b^5*cos(3*c) - 9*b^4*d*cos(3*c) - 82*b^3
*d^2*cos(3*c) + 82*b^2*d^3*cos(3*c) + 9*b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin(3*(b + d)*x + 3*a) + 27*(9*b^5*co
s(3*c) - 9*b^4*d*cos(3*c) - 82*b^3*d^2*cos(3*c) + 82*b^2*d^3*cos(3*c) + 9*b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin
((b + d)*x + a + 4*c) + 27*(9*b^5*cos(3*c) - 9*b^4*d*cos(3*c) - 82*b^3*d^2*cos(3*c) + 82*b^2*d^3*cos(3*c) + 9*
b*d^4*cos(3*c) - 9*d^5*cos(3*c))*sin((b + d)*x + a - 2*c) + 27*(9*b^5*cos(3*c) + 9*b^4*d*cos(3*c) - 82*b^3*d^2
*cos(3*c) - 82*b^2*d^3*cos(3*c) + 9*b*d^4*cos(3*c) + 9*d^5*cos(3*c))*sin(-(b - d)*x - a + 4*c) + 27*(9*b^5*cos
(3*c) + 9*b^4*d*cos(3*c) - 82*b^3*d^2*cos(3*c) - 82*b^2*d^3*cos(3*c) + 9*b*d^4*cos(3*c) + 9*d^5*cos(3*c))*sin(
-(b - d)*x - a - 2*c) + (9*b^5*cos(3*c) + 9*b^4*d*cos(3*c) - 82*b^3*d^2*cos(3*c) - 82*b^2*d^3*cos(3*c) + 9*b*d
^4*cos(3*c) + 9*d^5*cos(3*c))*sin(-3*(b - d)*x - 3*a + 6*c) + (9*b^5*cos(3*c) + 9*b^4*d*cos(3*c) - 82*b^3*d^2*
cos(3*c) - 82*b^2*d^3*cos(3*c) + 9*b*d^4*cos(3*c) + 9*d^5*cos(3*c))*sin(-3*(b - d)*x - 3*a) - 9*(9*b^5*cos(3*c
) + 27*b^4*d*cos(3*c) - 10*b^3*d^2*cos(3*c) - 30*b^2*d^3*cos(3*c) + b*d^4*cos(3*c) + 3*d^5*cos(3*c))*sin(-(b -
3*d)*x - a + 6*c) - 9*(9*b^5*cos(3*c) + 27*b^4*d*cos(3*c) - 10*b^3*d^2*cos(3*c) - 30*b^2*d^3*cos(3*c) + b*d^4
*cos(3*c) + 3*d^5*cos(3*c))*sin(-(b - 3*d)*x - a))/(9*b^6*cos(3*c)^2 + 9*b^6*sin(3*c)^2 - 9*(cos(3*c)^2 + sin(
3*c)^2)*d^6 + 91*(b^2*cos(3*c)^2 + b^2*sin(3*c)^2)*d^4 - 91*(b^4*cos(3*c)^2 + b^4*sin(3*c)^2)*d^2)
________________________________________________________________________________________
Fricas [A]
time = 1.96, size = 291, normalized size = 1.49 \begin {gather*} -\frac {{\left ({\left (63 \, b^{4} d - 88 \, b^{2} d^{3} + 9 \, d^{5} - {\left (9 \, b^{4} d - 82 \, b^{2} d^{3} + 9 \, d^{5}\right )} \cos \left (b x + a\right )^{2}\right )} \cos \left (d x + c\right )^{3} - 3 \, {\left (21 \, b^{4} d - 70 \, b^{2} d^{3} + 9 \, d^{5} - {\left (3 \, b^{4} d - 28 \, b^{2} d^{3} + 9 \, d^{5}\right )} \cos \left (b x + a\right )^{2}\right )} \cos \left (d x + c\right )\right )} \sin \left (b x + a\right ) - {\left ({\left (9 \, b^{5} - 88 \, b^{3} d^{2} + 63 \, b d^{4}\right )} \cos \left (b x + a\right )^{3} - {\left ({\left (9 \, b^{5} - 82 \, b^{3} d^{2} + 9 \, b d^{4}\right )} \cos \left (b x + a\right )^{3} - 3 \, {\left (9 \, b^{5} - 28 \, b^{3} d^{2} + 3 \, b d^{4}\right )} \cos \left (b x + a\right )\right )} \cos \left (d x + c\right )^{2} - 3 \, {\left (9 \, b^{5} - 70 \, b^{3} d^{2} + 21 \, b d^{4}\right )} \cos \left (b x + a\right )\right )} \sin \left (d x + c\right )}{3 \, {\left (9 \, b^{6} - 91 \, b^{4} d^{2} + 91 \, b^{2} d^{4} - 9 \, d^{6}\right )}} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(sin(b*x+a)^3*sin(d*x+c)^3,x, algorithm="fricas")
[Out]
-1/3*(((63*b^4*d - 88*b^2*d^3 + 9*d^5 - (9*b^4*d - 82*b^2*d^3 + 9*d^5)*cos(b*x + a)^2)*cos(d*x + c)^3 - 3*(21*
b^4*d - 70*b^2*d^3 + 9*d^5 - (3*b^4*d - 28*b^2*d^3 + 9*d^5)*cos(b*x + a)^2)*cos(d*x + c))*sin(b*x + a) - ((9*b
^5 - 88*b^3*d^2 + 63*b*d^4)*cos(b*x + a)^3 - ((9*b^5 - 82*b^3*d^2 + 9*b*d^4)*cos(b*x + a)^3 - 3*(9*b^5 - 28*b^
3*d^2 + 3*b*d^4)*cos(b*x + a))*cos(d*x + c)^2 - 3*(9*b^5 - 70*b^3*d^2 + 21*b*d^4)*cos(b*x + a))*sin(d*x + c))/
(9*b^6 - 91*b^4*d^2 + 91*b^2*d^4 - 9*d^6)
________________________________________________________________________________________
Sympy [B] Leaf count of result is larger than twice the leaf count of optimal. 3580 vs.
\(2 (172) = 344\).
time = 21.22, size = 3580, normalized size = 18.36 \begin {gather*} \text {Too large to display} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(sin(b*x+a)**3*sin(d*x+c)**3,x)
[Out]
Piecewise((x*sin(a)**3*sin(c)**3, Eq(b, 0) & Eq(d, 0)), (3*x*sin(a - 3*d*x)**3*sin(c + d*x)**3/32 - 9*x*sin(a
- 3*d*x)**3*sin(c + d*x)*cos(c + d*x)**2/32 - 9*x*sin(a - 3*d*x)**2*sin(c + d*x)**2*cos(a - 3*d*x)*cos(c + d*x
)/32 + 3*x*sin(a - 3*d*x)**2*cos(a - 3*d*x)*cos(c + d*x)**3/32 + 3*x*sin(a - 3*d*x)*sin(c + d*x)**3*cos(a - 3*
d*x)**2/32 - 9*x*sin(a - 3*d*x)*sin(c + d*x)*cos(a - 3*d*x)**2*cos(c + d*x)**2/32 - 9*x*sin(c + d*x)**2*cos(a
- 3*d*x)**3*cos(c + d*x)/32 + 3*x*cos(a - 3*d*x)**3*cos(c + d*x)**3/32 + 13*sin(a - 3*d*x)**3*sin(c + d*x)**2*
cos(c + d*x)/(320*d) + sin(a - 3*d*x)**3*cos(c + d*x)**3/(12*d) + 101*sin(a - 3*d*x)**2*sin(c + d*x)**3*cos(a
- 3*d*x)/(320*d) + 3*sin(a - 3*d*x)**2*sin(c + d*x)*cos(a - 3*d*x)*cos(c + d*x)**2/(20*d) + 27*sin(a - 3*d*x)*
cos(a - 3*d*x)**2*cos(c + d*x)**3/(320*d) + sin(c + d*x)**3*cos(a - 3*d*x)**3/(5*d) + 51*sin(c + d*x)*cos(a -
3*d*x)**3*cos(c + d*x)**2/(320*d), Eq(b, -3*d)), (5*x*sin(a - d*x)**3*sin(c + d*x)**3/16 + 3*x*sin(a - d*x)**3
*sin(c + d*x)*cos(c + d*x)**2/16 - 9*x*sin(a - d*x)**2*sin(c + d*x)**2*cos(a - d*x)*cos(c + d*x)/16 - 3*x*sin(
a - d*x)**2*cos(a - d*x)*cos(c + d*x)**3/16 + 3*x*sin(a - d*x)*sin(c + d*x)**3*cos(a - d*x)**2/16 + 9*x*sin(a
- d*x)*sin(c + d*x)*cos(a - d*x)**2*cos(c + d*x)**2/16 - 3*x*sin(c + d*x)**2*cos(a - d*x)**3*cos(c + d*x)/16 -
5*x*cos(a - d*x)**3*cos(c + d*x)**3/16 - 3*sin(a - d*x)**3*sin(c + d*x)**2*cos(c + d*x)/(16*d) - sin(a - d*x)
**3*cos(c + d*x)**3/(16*d) + sin(a - d*x)**2*sin(c + d*x)**3*cos(a - d*x)/(2*d) - 3*sin(a - d*x)*sin(c + d*x)*
*2*cos(a - d*x)**2*cos(c + d*x)/(4*d) + sin(c + d*x)**3*cos(a - d*x)**3/(48*d) + 5*sin(c + d*x)*cos(a - d*x)**
3*cos(c + d*x)**2/(16*d), Eq(b, -d)), (3*x*sin(a - d*x/3)**3*sin(c + d*x)**3/32 + 3*x*sin(a - d*x/3)**3*sin(c
+ d*x)*cos(c + d*x)**2/32 - 9*x*sin(a - d*x/3)**2*sin(c + d*x)**2*cos(a - d*x/3)*cos(c + d*x)/32 - 9*x*sin(a -
d*x/3)**2*cos(a - d*x/3)*cos(c + d*x)**3/32 - 9*x*sin(a - d*x/3)*sin(c + d*x)**3*cos(a - d*x/3)**2/32 - 9*x*s
in(a - d*x/3)*sin(c + d*x)*cos(a - d*x/3)**2*cos(c + d*x)**2/32 + 3*x*sin(c + d*x)**2*cos(a - d*x/3)**3*cos(c
+ d*x)/32 + 3*x*cos(a - d*x/3)**3*cos(c + d*x)**3/32 - 303*sin(a - d*x/3)**3*sin(c + d*x)**2*cos(c + d*x)/(320
*d) - 3*sin(a - d*x/3)**3*cos(c + d*x)**3/(5*d) - 39*sin(a - d*x/3)**2*sin(c + d*x)**3*cos(a - d*x/3)/(320*d)
- 9*sin(a - d*x/3)*sin(c + d*x)**2*cos(a - d*x/3)**2*cos(c + d*x)/(20*d) - 153*sin(a - d*x/3)*cos(a - d*x/3)**
2*cos(c + d*x)**3/(320*d) - sin(c + d*x)**3*cos(a - d*x/3)**3/(4*d) - 81*sin(c + d*x)*cos(a - d*x/3)**3*cos(c
+ d*x)**2/(320*d), Eq(b, -d/3)), (3*x*sin(a + d*x/3)**3*sin(c + d*x)**3/32 + 3*x*sin(a + d*x/3)**3*sin(c + d*x
)*cos(c + d*x)**2/32 + 9*x*sin(a + d*x/3)**2*sin(c + d*x)**2*cos(a + d*x/3)*cos(c + d*x)/32 + 9*x*sin(a + d*x/
3)**2*cos(a + d*x/3)*cos(c + d*x)**3/32 - 9*x*sin(a + d*x/3)*sin(c + d*x)**3*cos(a + d*x/3)**2/32 - 9*x*sin(a
+ d*x/3)*sin(c + d*x)*cos(a + d*x/3)**2*cos(c + d*x)**2/32 - 3*x*sin(c + d*x)**2*cos(a + d*x/3)**3*cos(c + d*x
)/32 - 3*x*cos(a + d*x/3)**3*cos(c + d*x)**3/32 - 303*sin(a + d*x/3)**3*sin(c + d*x)**2*cos(c + d*x)/(320*d) -
3*sin(a + d*x/3)**3*cos(c + d*x)**3/(5*d) + 39*sin(a + d*x/3)**2*sin(c + d*x)**3*cos(a + d*x/3)/(320*d) - 9*s
in(a + d*x/3)*sin(c + d*x)**2*cos(a + d*x/3)**2*cos(c + d*x)/(20*d) - 153*sin(a + d*x/3)*cos(a + d*x/3)**2*cos
(c + d*x)**3/(320*d) + sin(c + d*x)**3*cos(a + d*x/3)**3/(4*d) + 81*sin(c + d*x)*cos(a + d*x/3)**3*cos(c + d*x
)**2/(320*d), Eq(b, d/3)), (5*x*sin(a + d*x)**3*sin(c + d*x)**3/16 + 3*x*sin(a + d*x)**3*sin(c + d*x)*cos(c +
d*x)**2/16 + 9*x*sin(a + d*x)**2*sin(c + d*x)**2*cos(a + d*x)*cos(c + d*x)/16 + 3*x*sin(a + d*x)**2*cos(a + d*
x)*cos(c + d*x)**3/16 + 3*x*sin(a + d*x)*sin(c + d*x)**3*cos(a + d*x)**2/16 + 9*x*sin(a + d*x)*sin(c + d*x)*co
s(a + d*x)**2*cos(c + d*x)**2/16 + 3*x*sin(c + d*x)**2*cos(a + d*x)**3*cos(c + d*x)/16 + 5*x*cos(a + d*x)**3*c
os(c + d*x)**3/16 - sin(a + d*x)**3*sin(c + d*x)**2*cos(c + d*x)/(2*d) - 13*sin(a + d*x)**3*cos(c + d*x)**3/(4
8*d) - 3*sin(a + d*x)**2*sin(c + d*x)**3*cos(a + d*x)/(16*d) - 3*sin(a + d*x)*sin(c + d*x)**2*cos(a + d*x)**2*
cos(c + d*x)/(4*d) - 5*sin(a + d*x)*cos(a + d*x)**2*cos(c + d*x)**3/(16*d) + 3*sin(c + d*x)**3*cos(a + d*x)**3
/(16*d), Eq(b, d)), (3*x*sin(a + 3*d*x)**3*sin(c + d*x)**3/32 - 9*x*sin(a + 3*d*x)**3*sin(c + d*x)*cos(c + d*x
)**2/32 + 9*x*sin(a + 3*d*x)**2*sin(c + d*x)**2*cos(a + 3*d*x)*cos(c + d*x)/32 - 3*x*sin(a + 3*d*x)**2*cos(a +
3*d*x)*cos(c + d*x)**3/32 + 3*x*sin(a + 3*d*x)*sin(c + d*x)**3*cos(a + 3*d*x)**2/32 - 9*x*sin(a + 3*d*x)*sin(
c + d*x)*cos(a + 3*d*x)**2*cos(c + d*x)**2/32 + 9*x*sin(c + d*x)**2*cos(a + 3*d*x)**3*cos(c + d*x)/32 - 3*x*co
s(a + 3*d*x)**3*cos(c + d*x)**3/32 + 61*sin(a + 3*d*x)**3*sin(c + d*x)**2*cos(c + d*x)/(320*d) + sin(a + 3*d*x
)**3*cos(c + d*x)**3/(30*d) - 117*sin(a + 3*d*x)**2*sin(c + d*x)**3*cos(a + 3*d*x)/(320*d) + 3*sin(a + 3*d*x)*
sin(c + d*x)**2*cos(a + 3*d*x)**2*cos(c + d*x)/(20*d) + 11*sin(a + 3*d*x)*cos(a + 3*d*x)**2*cos(c + d*x)**3/(3
20*d) - sin(c + d*x)**3*cos(a + 3*d*x)**3/(4*d)...
________________________________________________________________________________________
Giac [A]
time = 0.42, size = 181, normalized size = 0.93 \begin {gather*} -\frac {\sin \left (3 \, b x + 3 \, d x + 3 \, a + 3 \, c\right )}{96 \, {\left (b + d\right )}} + \frac {3 \, \sin \left (3 \, b x + d x + 3 \, a + c\right )}{32 \, {\left (3 \, b + d\right )}} - \frac {3 \, \sin \left (3 \, b x - d x + 3 \, a - c\right )}{32 \, {\left (3 \, b - d\right )}} + \frac {\sin \left (3 \, b x - 3 \, d x + 3 \, a - 3 \, c\right )}{96 \, {\left (b - d\right )}} + \frac {3 \, \sin \left (b x + 3 \, d x + a + 3 \, c\right )}{32 \, {\left (b + 3 \, d\right )}} - \frac {9 \, \sin \left (b x + d x + a + c\right )}{32 \, {\left (b + d\right )}} + \frac {9 \, \sin \left (b x - d x + a - c\right )}{32 \, {\left (b - d\right )}} - \frac {3 \, \sin \left (b x - 3 \, d x + a - 3 \, c\right )}{32 \, {\left (b - 3 \, d\right )}} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate(sin(b*x+a)^3*sin(d*x+c)^3,x, algorithm="giac")
[Out]
-1/96*sin(3*b*x + 3*d*x + 3*a + 3*c)/(b + d) + 3/32*sin(3*b*x + d*x + 3*a + c)/(3*b + d) - 3/32*sin(3*b*x - d*
x + 3*a - c)/(3*b - d) + 1/96*sin(3*b*x - 3*d*x + 3*a - 3*c)/(b - d) + 3/32*sin(b*x + 3*d*x + a + 3*c)/(b + 3*
d) - 9/32*sin(b*x + d*x + a + c)/(b + d) + 9/32*sin(b*x - d*x + a - c)/(b - d) - 3/32*sin(b*x - 3*d*x + a - 3*
c)/(b - 3*d)
________________________________________________________________________________________
Mupad [B]
time = 4.31, size = 997, normalized size = 5.11 \begin {gather*} {\mathrm {e}}^{a\,3{}\mathrm {i}-c\,1{}\mathrm {i}+b\,x\,3{}\mathrm {i}-d\,x\,1{}\mathrm {i}}\,\left (\frac {-9\,b^3-3\,b^2\,d+9\,b\,d^2+3\,d^3}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}+\frac {{\mathrm {e}}^{-a\,6{}\mathrm {i}-b\,x\,6{}\mathrm {i}}\,\left (-9\,b^3+3\,b^2\,d+9\,b\,d^2-3\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,2{}\mathrm {i}-b\,x\,2{}\mathrm {i}}\,\left (-81\,b^3-81\,b^2\,d+9\,b\,d^2+9\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,4{}\mathrm {i}-b\,x\,4{}\mathrm {i}}\,\left (-81\,b^3+81\,b^2\,d+9\,b\,d^2-9\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}\right )-{\mathrm {e}}^{a\,3{}\mathrm {i}+c\,1{}\mathrm {i}+b\,x\,3{}\mathrm {i}+d\,x\,1{}\mathrm {i}}\,\left (\frac {-9\,b^3+3\,b^2\,d+9\,b\,d^2-3\,d^3}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}+\frac {{\mathrm {e}}^{-a\,6{}\mathrm {i}-b\,x\,6{}\mathrm {i}}\,\left (-9\,b^3-3\,b^2\,d+9\,b\,d^2+3\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,2{}\mathrm {i}-b\,x\,2{}\mathrm {i}}\,\left (-81\,b^3+81\,b^2\,d+9\,b\,d^2-9\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,4{}\mathrm {i}-b\,x\,4{}\mathrm {i}}\,\left (-81\,b^3-81\,b^2\,d+9\,b\,d^2+9\,d^3\right )}{b^4\,576{}\mathrm {i}-b^2\,d^2\,640{}\mathrm {i}+d^4\,64{}\mathrm {i}}\right )-{\mathrm {e}}^{a\,3{}\mathrm {i}-c\,3{}\mathrm {i}+b\,x\,3{}\mathrm {i}-d\,x\,3{}\mathrm {i}}\,\left (\frac {-b^3-b^2\,d+9\,b\,d^2+9\,d^3}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}+\frac {{\mathrm {e}}^{-a\,6{}\mathrm {i}-b\,x\,6{}\mathrm {i}}\,\left (-b^3+b^2\,d+9\,b\,d^2-9\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,2{}\mathrm {i}-b\,x\,2{}\mathrm {i}}\,\left (-9\,b^3-27\,b^2\,d+9\,b\,d^2+27\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,4{}\mathrm {i}-b\,x\,4{}\mathrm {i}}\,\left (-9\,b^3+27\,b^2\,d+9\,b\,d^2-27\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}\right )+{\mathrm {e}}^{a\,3{}\mathrm {i}+c\,3{}\mathrm {i}+b\,x\,3{}\mathrm {i}+d\,x\,3{}\mathrm {i}}\,\left (\frac {-b^3+b^2\,d+9\,b\,d^2-9\,d^3}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}+\frac {{\mathrm {e}}^{-a\,6{}\mathrm {i}-b\,x\,6{}\mathrm {i}}\,\left (-b^3-b^2\,d+9\,b\,d^2+9\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,2{}\mathrm {i}-b\,x\,2{}\mathrm {i}}\,\left (-9\,b^3+27\,b^2\,d+9\,b\,d^2-27\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}-\frac {{\mathrm {e}}^{-a\,4{}\mathrm {i}-b\,x\,4{}\mathrm {i}}\,\left (-9\,b^3-27\,b^2\,d+9\,b\,d^2+27\,d^3\right )}{b^4\,192{}\mathrm {i}-b^2\,d^2\,1920{}\mathrm {i}+d^4\,1728{}\mathrm {i}}\right ) \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
int(sin(a + b*x)^3*sin(c + d*x)^3,x)
[Out]
exp(a*3i - c*1i + b*x*3i - d*x*1i)*((9*b*d^2 - 3*b^2*d - 9*b^3 + 3*d^3)/(b^4*576i + d^4*64i - b^2*d^2*640i) +
(exp(- a*6i - b*x*6i)*(9*b*d^2 + 3*b^2*d - 9*b^3 - 3*d^3))/(b^4*576i + d^4*64i - b^2*d^2*640i) - (exp(- a*2i -
b*x*2i)*(9*b*d^2 - 81*b^2*d - 81*b^3 + 9*d^3))/(b^4*576i + d^4*64i - b^2*d^2*640i) - (exp(- a*4i - b*x*4i)*(9
*b*d^2 + 81*b^2*d - 81*b^3 - 9*d^3))/(b^4*576i + d^4*64i - b^2*d^2*640i)) - exp(a*3i + c*1i + b*x*3i + d*x*1i)
*((9*b*d^2 + 3*b^2*d - 9*b^3 - 3*d^3)/(b^4*576i + d^4*64i - b^2*d^2*640i) + (exp(- a*6i - b*x*6i)*(9*b*d^2 - 3
*b^2*d - 9*b^3 + 3*d^3))/(b^4*576i + d^4*64i - b^2*d^2*640i) - (exp(- a*2i - b*x*2i)*(9*b*d^2 + 81*b^2*d - 81*
b^3 - 9*d^3))/(b^4*576i + d^4*64i - b^2*d^2*640i) - (exp(- a*4i - b*x*4i)*(9*b*d^2 - 81*b^2*d - 81*b^3 + 9*d^3
))/(b^4*576i + d^4*64i - b^2*d^2*640i)) - exp(a*3i - c*3i + b*x*3i - d*x*3i)*((9*b*d^2 - b^2*d - b^3 + 9*d^3)/
(b^4*192i + d^4*1728i - b^2*d^2*1920i) + (exp(- a*6i - b*x*6i)*(9*b*d^2 + b^2*d - b^3 - 9*d^3))/(b^4*192i + d^
4*1728i - b^2*d^2*1920i) - (exp(- a*2i - b*x*2i)*(9*b*d^2 - 27*b^2*d - 9*b^3 + 27*d^3))/(b^4*192i + d^4*1728i
- b^2*d^2*1920i) - (exp(- a*4i - b*x*4i)*(9*b*d^2 + 27*b^2*d - 9*b^3 - 27*d^3))/(b^4*192i + d^4*1728i - b^2*d^
2*1920i)) + exp(a*3i + c*3i + b*x*3i + d*x*3i)*((9*b*d^2 + b^2*d - b^3 - 9*d^3)/(b^4*192i + d^4*1728i - b^2*d^
2*1920i) + (exp(- a*6i - b*x*6i)*(9*b*d^2 - b^2*d - b^3 + 9*d^3))/(b^4*192i + d^4*1728i - b^2*d^2*1920i) - (ex
p(- a*2i - b*x*2i)*(9*b*d^2 + 27*b^2*d - 9*b^3 - 27*d^3))/(b^4*192i + d^4*1728i - b^2*d^2*1920i) - (exp(- a*4i
- b*x*4i)*(9*b*d^2 - 27*b^2*d - 9*b^3 + 27*d^3))/(b^4*192i + d^4*1728i - b^2*d^2*1920i))
________________________________________________________________________________________